home *** CD-ROM | disk | FTP | other *** search
/ Mission 9 (Beta) / Mission 9 (Beta).iso / m9a.inf < prev    next >
INI File  |  1995-06-08  |  10KB  |  269 lines
  1. DefineVariables
  2. ;; Global variables for this installation.
  3.   Number    [ReturnVal2] := 1
  4.   Number    [ReturnVal1]
  5.   Text      [I]  ;; Variable used for Install directory
  6.   Text      [W]  ;; Variable used for Windows directory
  7.   Text      [WS] ;; Variable used for Windows\system directory
  8.   TextArray [taBackUpName] ;; Variable used for in use files
  9.   TextArray [taBackUpName] ;; Variable used for in use files
  10.   Text      [tInuseLine]   ;; Variable used to write inuse file to INUSE.BAT
  11.   Number    [nCounter]     ;; Variable used as a counter for While loop 
  12.   Number    [nInUse]       ;; Variable which indicates number of in use files
  13. EndDefineVariables
  14. Procedure SetupDisplay
  15. ;;15
  16.   SetCustomControls Off
  17.   SetDefaultBitMap Off
  18.   SetBackgroundColor 0 0 255 0 0 255 TopLeftToBottomRight
  19.   
  20.   
  21.   SetShadowAttrTo BlackOnLightGray
  22.   SetScreenAttrTo BlackOnLightGray
  23.   SetPopupAttrTo  BlackOnLightGray
  24.   SetAttentionAttrTo BlackOnLightGray
  25.   SetTopLineTo Mission 9 Installer
  26.   ShowWindow Maximized
  27. EndProcedure
  28. Procedure Install_Files
  29.  
  30. ;;30 
  31.   SetInstallModeTo Install
  32.   DetermineInstallationDrive ShowDrivesWithSpace
  33.   DetermineInstallationDirectory InstallationDrive:\M9
  34. SetReadOnlyInquiry off
  35. CopyFiles from [InstallFromDirectory]\system to [InstallationDirectory]
  36. M9.exe
  37. *.ico
  38. EndCopyFiles
  39.  
  40. CreateDirectoryIfNecessary [InstallationDirectory]\oldsys
  41. If FileExists [WindowsSystemDirectory]\chklist.ms
  42. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  43. chklist.ms
  44. EndCopyFiles
  45. EndIf
  46. If FileExists [WindowsSystemDirectory]\cmdialog.vbx
  47. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  48. cmdialog.vbx
  49. EndCopyFiles
  50. EndIf ;;50
  51. If FileExists [WindowsSystemDirectory]\grid.vbx
  52. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  53. grid.vbx
  54. EndCopyFiles
  55. EndIf
  56. If FileExists [WindowsSystemDirectory]\imk.dll
  57. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  58. imk.dll
  59. EndCopyFiles
  60. EndIf
  61. If FileExists [WindowsSystemDirectory]\knife.vbx
  62. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  63. knife.vbx
  64. EndCopyFiles
  65. EndIf
  66. If FileExists [WindowsSystemDirectory]\kniferun.vbx
  67. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  68. kniferun.vbx
  69. EndCopyFiles
  70. EndIf
  71. If FileExists [WindowsSystemDirectory]\mkdisply.vbx
  72. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  73. mkdisply.vbx
  74. EndCopyFiles
  75. EndIf
  76. If FileExists [WindowsSystemDirectory]\mkimk.vbx
  77. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  78. mkimk.vbx
  79. EndCopyFiles
  80. EndIf
  81. If FileExists [WindowsSystemDirectory]\mksprite.vbx
  82. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  83. mksprite.vbx
  84. EndCopyFiles
  85. EndIf
  86. If FileExists [WindowsSystemDirectory]\mktext.vbx
  87. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  88. mktext.vbx
  89. EndCopyFiles
  90. EndIf
  91. If FileExists [WindowsSystemDirectory]\mktools.vbx
  92. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  93. mktools.vbx
  94. EndCopyFiles
  95. EndIf
  96. If FileExists [WindowsSystemDirectory]\msole2.vbx
  97. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  98. msole2.vbx
  99. EndCopyFiles
  100. EndIf  ;;100
  101. If FileExists [WindowsSystemDirectory]\threed.vbx
  102. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  103. threed.vbx
  104. EndCopyFiles
  105. EndIf
  106. If FileExists [WindowsSystemDirectory]\vplay.vbx
  107. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  108. vplay.vbx
  109. EndCopyFiles
  110. EndIf
  111. If FileExists [WindowsSystemDirectory]\vbrun300.dll
  112. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  113. vbrun300.dll
  114. EndCopyFiles
  115. EndIf
  116. If FileExists [WindowsSystemDirectory]\zwipes.dll
  117. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  118. zwipes.dll
  119. EndCopyFiles
  120. EndIf
  121. If FileExists [WindowsSystemDirectory]\zwnd.dll
  122. CopyFiles from [WindowsSystemDirectory]  to  [InstallationDirectory]\oldsys
  123. zwnd.dll
  124. EndCopyFiles
  125. EndIf
  126. CopyFiles from [InstallFromDirectory]\system  to  [WindowsSystemDirectory]  
  127. *.vbx
  128. *.dll
  129. EndCopyFiles
  130.  
  131. CreateFile [InstallationDirectory]\M9.INI 
  132. ModifyTextFile [InstallationDirectory]\M9.INI
  133. InsertAtLine 1 [InstallFromDrive]:\
  134. InsertAtLine 2 [InstallFromDrive]:\ 
  135. EndModifyTextFile
  136.  
  137. DeleteFiles  ;;150
  138. m9.0*
  139. EndDeleteFiles
  140.  
  141. ModifyTextFile [WindowsDirectory]\WIN.INI
  142. InsertAtLine End [AAPLAY Animation]
  143. InsertAtLine End FullScreen = AAVGA.DLL
  144. EndModifyTextFile
  145.  
  146.  
  147. ProgramManagerDDE
  148. CreateGroup (Mission 9)
  149. AddItem([InstallationDirectory]\m9.exe,Mission 9 Beta, [InstallationDirectory]\mis9.ico)
  150. EndProgramManagerDDE
  151.  
  152. If FileExists [WindowsSystemDirectory]\aaplay.dll
  153. Else
  154.  DialogBox  210 102 Returns [Number1] BlackOnLightGray UseHeader "Install Autodesk Animator Player" SysMenu ;;
  155.       Font "Helv" 8
  156.       StaticText @xy(8,7) 205 19 "Autodesk Animator Player must be installed for Mission 9 to work properly."
  157.       StaticText @xy(8,33) 205 13 "The Autodesk Animator installer will now run automatically."
  158.       StaticText @xy(8,52) 205 34 "BE SURE TO SELECT THE OPTION TO INSTALL THE MCI ANMATION DRIVER."
  159.       PushButton OKbtn @xy(76,78) 69 15 "OK" 100
  160.    EndDialogBox
  161. Run [InstallFromDirectory]\aaplay\aasetup.exe
  162. EndIf
  163.  
  164. If FileExists [WindowsSystemDirectory]\mciavi.drv
  165. Else
  166.  DialogBox  225 181 Returns [Number1] BlackOnLightGray UseHeader "What this installer has done." SysMenu ;;
  167.       Font "Helv" 8
  168.     StaticText @xy(8,7) 203 23 "This installer has copied the application M9.EXE to your hard drive into the directory M9 or an alternative of your choice."
  169.       StaticText @xy(8,30) 203 23 "It has created a file named M9.INI in the same directory."
  170.      StaticText @xy(8,103) 203 11 "The following has been added to the WIN.INI file:"
  171.       StaticText @xy(24,114) 203 11 "[AAPLAY Animation]"
  172.     StaticText @xy(8,44) 203 18 "It has copied a number of files to the Windows/System"
  173.    StaticText @xy(8,52) 203 18 "directory.  If earlier versions of those files existed the earlier"
  174. StaticText @xy(8,60) 203 18 "versions have been copied to the directory M9/OLDSYS."
  175.    StaticText @xy(8,78) 203 22 "A Program Manager group entitled Mission 9 has been created with an icon for the Mission 9 application."
  176.  StaticText @xy(24,126) 203 11 "FullScreen=AAVGA.DLL"
  177.  StaticText @xy(8,140) 203 11 "Video for Windows 1.1 will now be installed."
  178.       PushButton OKbtn @xy(72,160) 69 15 "OK" 100
  179.    EndDialogBox
  180. Run [InstallFromDirectory]\vfwsetup\setup
  181. EndIf
  182.  
  183.  DialogBox  225 161 Returns [Number1] BlackOnLightGray UseHeader "What this installer has done." SysMenu ;;
  184.       Font "Helv" 8
  185.     StaticText @xy(8,7) 203 23 "This installer has copied the application M9.EXE to your hard drive into the directory M9 or an alternative of your choice."
  186.       StaticText @xy(8,30) 203 23 "It has created a file named M9.INI in the same directory."
  187.      StaticText @xy(8,103) 203 11 "The following has been added to the WIN.INI file:"
  188.       StaticText @xy(24,114) 203 11 "[AAPLAY Animation]"
  189.     StaticText @xy(8,44) 203 18 "It has copied a number of files to the Windows/System"
  190.    StaticText @xy(8,52) 203 18 "directory.  If earlier versions of those files existed the earlier"
  191. StaticText @xy(8,60) 203 18 "versions have been copied to the directory M9/OLDSYS."
  192.    StaticText @xy(8,78) 203 22 "A Program Manager group entitled Mission 9 has been created with an icon for the Mission 9 application."
  193.  StaticText @xy(24,126) 203 11 "FullScreen=AAVGA.DLL"
  194.       PushButton OKbtn @xy(72,140) 69 15 "OK" 100
  195.    EndDialogBox
  196.  
  197. [nInUse] := LastIndexUsedFor [taInUseArray]
  198. If [nInUse] > 0
  199.    While [nCounter] < [nInUse]
  200.       [tInUseLine] := Copy [taBackUpName][[nCounter]] To [taInUseArray][[nCounter]]
  201.  
  202.       AppendFile [InstallationDirectory]\INUSE.BAT
  203.       [tInUseLine]
  204.       EndAppendFile
  205.    EndWhile
  206.    Dialog UseHeader "Warning"
  207.   .lThe following files were being used by another process,
  208.   .lso they could not be overwritten.  They have been renamed
  209.   .las follows:
  210.   [taBackUpName]
  211.   .You may run the batch file INUSE.BAT located in
  212.   .l[InstallationDirectory].
  213.   .lThis batch file will copy the backup files to the
  214.   .lappropriate names, or you may copy the files
  215.   .lyourself.
  216.   EndDIalog
  217. EndIf
  218.   PopUp Installation Complete.
  219. EndProcedure
  220.  
  221. Do SetupDisplay
  222.  
  223. :Start
  224.  
  225. DialogBox   225 158 Returns [Number1] BlackOnLightGray UseHeader "Requirements for Mission 9" SysMenu ;;
  226.       Font "MS Sans Serif" 8
  227.       StaticText @xy(8,33) 73 12 "486/33 or above"
  228.       StaticText @xy(8,44) 73 12 "CD-ROM 2x or above"
  229.       StaticText @xy(8,55) 73 12 "DOS 5.x or above"
  230.       StaticText @xy(8,66) 73 12 "Windows 3.1 or above"
  231.       StaticText @xy(8,78) 122 12 "Sound Card installed for Windows"
  232.       StaticText @xy(8,89) 162 12 "MSCDEX CD-ROM driver installed for Windows"
  233.       StaticText @xy(8,100) 162 12 "256 color Video drivers installed for Windows"
  234.       StaticText @xy(8,7) 210 20 "The following configuration is required for running the Mission 9 software:"
  235.       StaticText @xy(8,111) 209 15 "Video for Windows runtime 1.1 or above (provided on CD-ROM)"
  236.       StaticText @xy(8,122) 213 12 "Autodesk Animator Player (provided on CD-ROM)"
  237.       DefPushButton OKbtn @xy(76,137) 69 15 "OK" 100
  238.    EndDialogBox
  239. DialogBox 200 100 UseHeader "Installation Menu" Returns [ReturnVal1] BlackOnLightGray ModalFrame
  240.  Font "Helv" 8
  241.  GroupBox @xy(10,4) 180 70 ""
  242.  RadioButtonGroup Uses [ReturnVal2]
  243.     RadioButton @xy(15,17) 120 12 "Install Mission 9"
  244.     RadioButton @xy(15,30) 120 12 "Exit Installation"
  245.  PushButton @xy(30,80) 40 14 "OK" 1
  246.  ;;PushButton @xy(130,80) 40 14 "Help" 8
  247. EndDialogBox
  248.  
  249. Incase [ReturnVal1] Is
  250.    =8: Dialog UseHeader "OurINSTALL 1.0 Help"
  251.        .l Choose Install OurINSTALL1.0 to install this product.
  252.        .l Choose Exit to leave this installation.
  253.        .c Press <OK> to return to main menu.
  254.        EndDialog
  255.        GoTo Start
  256.  
  257.   =9: SoLong
  258. EndInCase
  259.  
  260. InCase [ReturnVal2] Is
  261. =1: Do Install_Files
  262.     [ReturnVal2] := 2
  263.     ;;GoTo Start
  264.  
  265. =2:
  266.  
  267.     SoLong
  268. EndInCase
  269.